@echo off
set shortCutPath="%USERPROFILE%\desktop\chrome with proxy.lnk" 
echo Dim WshShell,Shortcut>>tmp.vbs 
echo Dim path,fso>>tmp.vbs 
echo path="%~p0\start.exe">>tmp.vbs 
echo Set fso=CreateObject("Scripting.FileSystemObject")>>tmp.vbs 
echo Set WshShell=WScript.CreateObject("WScript.Shell")>>tmp.vbs 
echo Set Shortcut=WshShell.CreateShortCut(%shortCutPath%)>>tmp.vbs 
echo Shortcut.TargetPath=path>>tmp.vbs 
echo Shortcut.Save>>tmp.vbs 
"%SystemRoot%\System32\WScript.exe" tmp.vbs 
@rem del /f /s /q tmp.vbs  
pause